home *** CD-ROM | disk | FTP | other *** search
- #ifndef PRAGMAS_MATHFFP_PRAGMAS_H
- #define PRAGMAS_MATHFFP_PRAGMAS_H
-
- /*
- ** $VER: mathffp_pragmas.h 40.1 (17.5.1996)
- ** Includes Release 44.1
- **
- ** Direct ROM interface (pragma) definitions.
- **
- ** Copyright © 1999 Amiga, Inc.
- ** All Rights Reserved
- */
-
- #if defined(LATTICE) || defined(__SASC) || defined(_DCC)
- #ifndef __CLIB_PRAGMA_LIBCALL
- #define __CLIB_PRAGMA_LIBCALL
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #else /* __MAXON__, __STORM__ or AZTEC_C */
- #ifndef __CLIB_PRAGMA_AMICALL
- #define __CLIB_PRAGMA_AMICALL
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* */
-
- #if defined(__SASC) || defined(__STORM__)
- #ifndef __CLIB_PRAGMA_TAGCALL
- #define __CLIB_PRAGMA_TAGCALL
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #endif /* __MAXON__, __STORM__ or AZTEC_C */
-
- #ifndef CLIB_MATHFFP_PROTOS_H
- #include <clib/mathffp_protos.h>
- #endif /* CLIB_MATHFFP_PROTOS_H */
-
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPFix 1e 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x1e, SPFix(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPFlt 24 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x24, SPFlt(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPCmp 2a 0102
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x2a, SPCmp(d1,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPTst 30 101
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x30, SPTst(d1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPAbs 36 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x36, SPAbs(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPNeg 3c 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x3c, SPNeg(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPAdd 42 0102
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x42, SPAdd(d1,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPSub 48 0102
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x48, SPSub(d1,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPMul 4e 0102
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x4e, SPMul(d1,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPDiv 54 0102
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x54, SPDiv(d1,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- /*--- functions in V33 or higher (Release 1.2) ---*/
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPFloor 5a 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x5a, SPFloor(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall MathBase SPCeil 60 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(MathBase, 0x60, SPCeil(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
-
- #endif /* PRAGMAS_MATHFFP_PRAGMAS_H */
-